﻿Class MainWindow 
  Private Sub HandleCheck(
      ByVal sender As Object,
      ByVal e As RoutedEventArgs)
    MessageBox.Show("Stato attivo")
  End Sub

  Private Sub HandleUnchecked(
      ByVal sender As Object,
      ByVal e As RoutedEventArgs)
    MessageBox.Show("Stato inattivo")
  End Sub

  Private Sub HandleThirdState(
      ByVal sender As Object,
      ByVal e As RoutedEventArgs)
    MessageBox.Show("Stato indeterminato")
  End Sub
End Class
